module gi10
  use param
  implicit none
  real(dbl) :: qp(10),qw(10),iqp(10),iqw(10)
  data qp/&
  -9.739065285d-01,-8.650633666d-01,-6.794095682d-01,-4.333953941d-01,&
  -1.488743389d-01,+1.488743389d-01,+4.333953941d-01,+6.794095682d-01,&
  +8.650633666d-01,+9.739065285d-01/
  data qw/&
  +6.667134430d-02,+1.494513491d-01,+2.190863625d-01,+2.692667193d-01,&
  +2.955242247d-01,+2.955242247d-01,+2.692667193d-01,+2.190863625d-01,&
  +1.494513491d-01,+6.667134430d-02/
  data iqp/&
  +9.739065285d-01,+8.650633666d-01,+6.794095682d-01,+4.333953941d-01,&
  +1.488743389d-01,-1.488743389d-01,-4.333953941d-01,-6.794095682d-01,&
  -8.650633666d-01,-9.739065285d-01/
  data iqw/&
  +6.667134430d-02,+1.494513491d-01,+2.190863625d-01,+2.692667193d-01,&
  +2.955242247d-01,+2.955242247d-01,+2.692667193d-01,+2.190863625d-01,&
  +1.494513491d-01,+6.667134430d-02/
end module gi10
